home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1994 October / 1994-10b.d64 / sprite ldr.ml (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  385b  |  9 lines
  1. 10 rem machine language sprite file loader - use desired sprite filename in 40
  2. 20 s=128*64:m=49152
  3. 30 fora=mtom+26:readb:pokea,b:next:h=int(s/256):poke253,s-h*256:poke255,h
  4. 40 open1,8,4,"filename":sysm:close1
  5. 50 data 162,1,32,198,255,32,228,255,164,253,145,254,192,255,208,2,230,255,230
  6. 60 data 253,165,144,240,237,76,204,255
  7. 70 rem s=)starting sprite block)*64
  8. 80 rem m=ml starting address : ml=828,  for example
  9.